home *** CD-ROM | disk | FTP | other *** search
/ La Bible Des… Fonts / La Bible des... Fonts.iso / Utilitaires / HP LaserJet Utility / HP LaserJet Utility.rsrc / PSpg_1002 < prev    next >
Text File  |  1993-04-15  |  9KB  |  403 lines
  1. %!PS_Adobe
  2. version (2010.118) eq not {/resourceforall where {pop /fontdict 1 dict def (*) {fontdict exch cvn 1 put} 32 string /Font resourceforall /FontDirectory fontdict def}if }if
  3. /bd {bind def} bind def
  4. /cp {closepath}bd
  5. /ct {curveto}bd
  6. /eof {eofill}bd
  7. /f {fill}bd
  8. /gr {grestore}bd
  9. /gs {gsave}bd
  10. /sg {setgray}bd
  11. /lto {lineto}bd
  12. /mt {moveto}bd
  13. /np {newpath}bd
  14. /rlt {rlineto}bd
  15. /rmt {rmoveto}bd
  16. /s {show}bd
  17. /sw {stringwidth}bd
  18. /st {stroke}bd
  19. /t {translate}bd
  20. /w {setlinewidth}bd
  21. /sp {clippath st showpage}bd
  22. /pz {np clippath pathbbox}bd
  23. /y pz exch pop exch pop exch pop def
  24. /x pz pop exch pop exch pop def
  25. /normx 600 def
  26. /fs x normx div 14 mul def
  27. /headersize fs 1.5 mul def
  28. /pagewidth pz pop exch pop exch sub def
  29. /center pz pop pop pop pagewidth 2.5 div add def
  30. /yd fs 1.3 mul def
  31. /lm fs 4 mul def
  32. /inch 72 def
  33. /str { 32 string }bd
  34. /str64 64 string def
  35. /pagenum 1 def
  36. /page 6 string def
  37. /leftbox pz pop pop pop def
  38. /bottombox y fs 5 mul sub def
  39. /firstline y fs 8.3 mul sub def
  40. /bottomedge pz pop pop exch pop 1 add def
  41. /centerGap fs 2.3 div def
  42. /titleleft centerGap 2 mul leftbox add def
  43.  
  44. /hplogo_x x 1.6 div def
  45. /hplogo_y y fs 9.5 mul sub def
  46. /hplogo_scale x normx div .25 mul def
  47. /dh {% Left half of circle
  48. 285.48 375.34 mt
  49. 337.68 375.19 lto
  50. 339.77 381.60 lto
  51. 301.10 394.92 298.01 447.62 335.59 465.19 ct
  52. 338.33 473.33 lto
  53. 285.48 472.97 lto
  54. 280.30 473.04 275.26 469.37 275.11 462.67 ct
  55. 275.11 385.70 lto
  56. 275.26 380.02 279.58 375.48 285.48 375.34 ct
  57. eof
  58.  
  59. 354.89 473.40 mt
  60. 344.38 473.40 lto
  61. 321.12 405.79 lto
  62. 331.63 405.79 lto
  63. 342.65 437.83 lto
  64. 348.12 437.83 lto
  65. 337.18 405.79 lto
  66. 347.62 405.79 lto
  67. 358.20 436.46 lto
  68. 359.50 440.14 356.83 443.45 353.30 443.38 ct
  69. 344.52 443.38 lto
  70. 354.89 473.40 lto
  71. eof
  72. }bd
  73. /dp {
  74. 381.74 407.81 mt
  75. 380.95 405.58 378.79 404.06 376.42 404.06 ct
  76. 364.39 403.99 lto
  77. 354.10 375.05 lto
  78. 343.80 375.05 lto
  79. 367.34 443.38 lto
  80. 386.64 443.38 lto
  81. 390.53 443.45 392.76 439.85 391.54 436.54 ct
  82. 381.74 407.81 lto
  83. cp
  84. 381.46 437.76 mt
  85. 375.98 437.76 lto
  86. 366.26 409.61 lto
  87. 371.74 409.61 lto
  88. 381.46 437.76 lto
  89. eof
  90.  
  91. 435.24 385.56 mt
  92. 435.24 461.59 lto
  93. 435.46 468.22 431.42 472.90 424.87 473.04 ct
  94. 361.15 473.40 lto
  95. 358.85 466.70 lto
  96. 411.34 465.12 418.25 390.46 362.95 381.60 ct
  97. 360.58 375.05 lto
  98. 424.87 375.34 lto
  99. 430.49 375.48 434.81 379.22 435.24 385.56 ct
  100. eof
  101. }bd
  102. /dH {
  103. 499.25 434.74 mt
  104. 499.25 450.65 lto
  105. 475.70 450.65 lto
  106. 475.70 434.74 lto
  107. 467.28 434.74 lto
  108. 467.28 473.04 lto
  109. 475.70 473.04 lto
  110. 475.70 457.92 lto
  111. 499.25 457.92 lto
  112. 499.25 473.04 lto
  113. 507.67 473.04 lto
  114. 507.67 434.74 lto
  115. 499.25 434.74 lto
  116. eof
  117. }bd
  118. /dE1 {
  119. 552.53 473.04 mt
  120. 552.53 464.62 lto
  121. 525.60 464.62 lto
  122. 525.60 457.92 lto
  123. 548.57 457.92 lto
  124. 548.57 450.94 lto
  125. 525.60 450.94 lto
  126. 525.60 443.23 lto
  127. 553.75 443.23 lto
  128. 553.75 434.81 lto
  129. 522.43 434.81 lto
  130. 519.34 434.81 517.39 437.40 517.25 440.06 ct
  131. 517.25 467.86 lto
  132. 517.10 470.09 519.05 472.82 522.43 473.04 ct
  133. 552.53 473.04 lto
  134. eof
  135. }bd
  136. /dW {
  137. 599.18 434.81 mt
  138. 596.38 435.10 595.30 436.10 594.29 438.55 ct
  139. 588.17 461.45 lto
  140. 581.04 434.81 lto
  141. 574.56 434.81 lto
  142. 572.18 434.88 570.82 435.96 569.66 438.48 ct
  143. 558.29 472.97 lto
  144. 567.00 472.97 lto
  145. 575.35 446.11 lto
  146. 583.56 472.97 lto
  147. 592.78 472.97 lto
  148. 600.91 446.04 lto
  149. 609.26 472.97 lto
  150. 617.98 472.97 lto
  151. 605.30 434.81 lto
  152. 599.18 434.81 lto
  153. eof
  154.  
  155. }bd
  156. /dL {
  157. 625.46 439.99 mt
  158. 625.61 437.04 627.70 434.88 630.58 434.81 ct
  159. 658.51 434.81 lto
  160. 658.51 443.16 lto
  161. 633.89 443.16 lto
  162. 633.89 472.97 lto
  163. 625.46 472.97 lto
  164. 625.46 439.99 lto
  165. eof
  166. }bd
  167. /dE2 {
  168. 667.58 434.81 mt
  169. 698.90 434.81 lto
  170. 698.90 443.23 lto
  171. 670.75 443.23 lto
  172. 670.75 450.86 lto
  173. 693.72 450.86 lto
  174. 693.72 457.85 lto
  175. 670.75 457.85 lto
  176. 670.75 464.62 lto
  177. 697.68 464.62 lto
  178. 697.68 473.04 lto
  179. 667.58 473.04 lto
  180. 664.20 472.90 662.40 470.52 662.40 467.78 ct
  181. 662.40 458.57 662.40 449.28 662.40 439.99 ct
  182. 662.40 437.04 664.70 434.81 667.58 434.81 ct
  183. eof
  184. }bd
  185. /dT1 {
  186. 718.06 434.74 mt
  187. 718.06 464.62 lto
  188. 705.10 464.62 lto
  189. 705.10 473.04 lto
  190. 739.44 473.04 lto
  191. 739.44 464.62 lto
  192. 726.48 464.62 lto
  193. 726.48 434.74 lto
  194. 718.06 434.74 lto
  195. eof
  196. }bd
  197. /dT2 {
  198. 758.59 434.74 mt
  199. 758.59 464.62 lto
  200. 745.63 464.62 lto
  201. 745.63 473.04 lto
  202. 779.98 473.04 lto
  203. 779.98 464.62 lto
  204. 767.02 464.62 lto
  205. 767.02 434.74 lto
  206. 758.59 434.74 lto
  207. eof
  208. }bd
  209. /dP {
  210. 475.63 375.34 mt
  211. 475.63 385.92 lto
  212. 494.78 385.92 lto
  213. 502.27 385.99 505.58 390.74 505.66 399.74 ct
  214. 505.73 407.66 502.99 413.64 494.78 413.50 ct
  215. 467.21 413.50 lto
  216. 467.21 375.34 lto
  217. 475.63 375.34 lto
  218. cp
  219. 497.16 399.89 mt
  220. 497.09 403.70 495.36 405.65 492.34 405.65 ct
  221. 475.63 405.65 lto
  222. 475.63 393.91 lto
  223. 492.34 393.91 lto
  224. 495.50 394.13 497.23 395.93 497.16 399.89 ct
  225. eof
  226. }bd
  227. /dA1 {
  228. 505.15 375.41 mt
  229. 521.78 413.57 lto
  230. 529.13 413.57 lto
  231. 533.88 413.57 535.18 412.85 537.19 409.32 ct
  232. 552.31 375.41 lto
  233. 543.10 375.41 lto
  234. 539.64 382.90 lto
  235. 517.54 382.90 lto
  236. 514.37 375.41 lto
  237. 505.15 375.41 lto
  238. cp
  239. 520.99 390.53 mt
  240. 528.55 408.10 lto
  241. 536.26 390.53 lto
  242. 520.99 390.53 lto
  243. eof
  244. }bd
  245. /dC {
  246. 595.66 387.14 mt
  247. 587.02 387.14 lto
  248. 586.73 383.11 586.87 382.54 576.22 382.46 ct
  249. 563.69 382.46 564.34 381.96 564.26 394.20 ct
  250. 564.19 406.51 563.69 406.08 576.22 406.08 ct
  251. 586.87 406.08 586.44 405.36 587.02 401.47 ct
  252. 595.66 401.47 lto
  253. 596.02 411.91 591.70 413.86 576.22 413.86 ct
  254. 556.70 413.86 555.12 412.56 555.12 394.20 ct
  255. 555.12 376.42 556.63 374.69 576.29 374.54 ct
  256. 591.55 374.47 596.02 376.42 595.66 387.14 ct
  257. eof
  258. }bd
  259. /dK {
  260. 603.50 375.26 mt
  261. 603.50 413.50 lto
  262. 611.93 413.50 lto
  263. 611.93 399.38 lto
  264. 616.97 399.38 lto
  265. 631.08 413.50 lto
  266. 642.82 413.50 lto
  267. 624.82 395.57 lto
  268. 639.79 380.59 lto
  269. 639.79 375.26 lto
  270. 633.38 375.26 lto
  271. 617.47 391.25 lto
  272. 611.93 391.25 lto
  273. 611.93 375.26 lto
  274. 603.50 375.26 lto
  275. eof
  276. }bd
  277. /dA2 {
  278. 673.92 409.32 mt
  279. 689.04 375.41 lto
  280. 679.82 375.41 lto
  281. 676.22 382.90 lto
  282. 654.19 382.90 lto
  283. 651.02 375.41 lto
  284. 644.33 375.41 lto
  285. 644.33 381.02 lto
  286. 658.51 413.57 lto
  287. 665.86 413.57 lto
  288. 669.96 413.50 672.05 412.99 673.92 409.32 ct
  289. cp
  290. 657.58 390.53 mt
  291. 665.21 408.10 lto
  292. 672.84 390.53 lto
  293. cp
  294. eof
  295. }bd
  296. /dR {
  297. 732.31 380.30 mt
  298. 732.31 375.41 lto
  299. 723.53 375.41 lto
  300. 723.53 380.30 lto
  301. 723.46 383.47 722.95 385.78 719.50 385.92 ct
  302. 703.58 385.92 lto
  303. 703.58 375.41 lto
  304. 695.09 375.41 lto
  305. 695.09 413.50 lto
  306. 722.74 413.50 lto
  307. 731.02 413.50 733.82 407.59 734.04 399.82 ct
  308. 734.18 393.48 732.24 389.23 729.14 387.94 ct
  309. 731.88 385.99 732.31 384.48 732.31 380.30 ct
  310. cp
  311. 720.22 405.65 mt
  312. 703.51 405.65 lto
  313. 703.51 393.91 lto
  314. 720.22 393.91 lto
  315. 723.53 393.84 724.90 396.43 724.90 399.53 ct
  316. 724.90 402.62 724.03 405.58 720.22 405.65 ct
  317. eof
  318. }bd
  319. /dD {
  320. 769.75 375.34 mt
  321. 779.04 375.34 782.28 379.73 782.28 394.27 ct
  322. 782.21 410.18 778.10 413.42 769.75 413.50 ct
  323. 742.54 413.50 lto
  324. 742.54 375.34 lto
  325. cp
  326. 750.96 383.54 mt
  327. 750.96 406.15 lto
  328. 766.37 406.15 lto
  329. 770.98 405.94 773.71 405.07 773.64 394.27 ct
  330. 773.57 384.77 771.19 383.47 766.08 383.54 ct
  331. cp
  332. eof
  333. }bd
  334.  
  335. /drawlogo {
  336. gs
  337. hplogo_x hplogo_y t
  338. hplogo_scale dup scale
  339. dh dp dH dE1 dW dL dE2 dT1 dT2 dP dA1 dC dK dA2 dR dD
  340. gr
  341. }bd 
  342.  
  343. /header { /yp y 1.7 fs mul sub def 
  344. np 0 sg leftbox y mt x y lineto x bottombox lineto leftbox bottombox lineto leftbox y lineto cp .98 sg f 0 sg
  345. /Times-Roman findfont fs scalefont setfont   
  346. (Fonts currently resident in ) str64 copy length /indx exch def 
  347. str64 indx statusdict begin product end dup length /indx exch indx add def putinterval 
  348. str64 0 indx getinterval titleleft yp mt s
  349. /Times-BoldItalic findfont headersize scalefont setfont  
  350. /yp yp yd 1.5 mul sub def
  351. (") str64 copy length /indx exch def
  352. str64 0 170 put
  353. str64 indx statusdict begin str printername end dup length /indx exch indx add def putinterval
  354. str64 indx 186 put /indx indx 1 add def
  355. str64 0 indx getinterval titleleft yp mt s
  356. /yp bottombox def 
  357. .5 w 0 yp mt x yp lineto st
  358. /yp yp yd sub def
  359. /Times-Roman findfont fs scalefont setfont
  360. leftbox centerGap 2 mul add yp mt (Font Name) s
  361. (Page  ) page copy pop page 5 48 pagenum add put
  362. page dup sw pop x centerGap 2 mul sub exch sub yp mt s
  363. /yp  yp fs 2 div sub def 
  364. .5 w 0 yp mt x yp lineto st
  365. drawlogo
  366. /yp yp yd sub def
  367. } def
  368. header
  369. /yp firstline def
  370. /yp y fs 8.3 mul sub def
  371. lm yp mt
  372. clear
  373. mark
  374. FontDirectory { pop str cvs } forall
  375. /FontArray counttomark 1 sub array def
  376. cleartomark
  377. /limit FontArray length def
  378. /ind1 0 def
  379. FontDirectory { pop str cvs str copy FontArray exch ind1 exch put /ind1 ind1 1 add def } forall
  380. 0 1 limit { /ind1 exch def /ind2 ind1 1 add def
  381.  ind2 limit lt {
  382. /temp1 FontArray ind1 get def
  383. /temp2 FontArray ind2 get def
  384. ind2 1 limit{ pop ind2 limit lt {
  385. temp1 temp2 gt {
  386. FontArray ind2 temp1 put
  387. FontArray ind1 temp2 put
  388. } if } if
  389. /ind2 ind2 1 add def
  390. ind2 limit lt {
  391. /temp1 FontArray ind1 get def 
  392. /temp2 FontArray ind2 get def} if } for } if
  393. } for
  394. 0 1 limit 1 sub { yp bottomedge lt { sp /pagenum pagenum 1 add def header /yp firstline def }if
  395. FontArray exch get dup 
  396. leftbox centerGap 2 mul add yp mt 
  397. /Times-Roman findfont fs scalefont setfont
  398. pop
  399. s 
  400. lm /yp yp yd sub def  
  401. yp mt } for
  402. sp